%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Batimento de duas frequências.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
clear;
figure(1);			clf;

Dk =1;				vg =5;
t  =[0:.05:20];		x  =[-10:.01:100];

for tt=1:length(t)
	u =x-vg*t(tt);
	Y2=sin(u*Dk/2)./u;
		
	plot(x,Y2,'LineWidth',1.6)
	set(gca,'xLim',[min(x) max(x)],'yLim',[-1 1],'FontSize',16,'LineWidth',1.4)
	xlabel('\fontsize{16}{\itx}')
	ylabel('\fontsize{16}{\itY}({\itx},{\itt})')
	pause(.01);
end

